object MensajeDisco: TMensajeDisco Left = 263 Top = 124 BorderIcons = [biSystemMenu] BorderStyle = bsSingle Caption = 'MensajeDisco' ClientHeight = 103 ClientWidth = 398 Color = 14215660 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} OldCreateOrder = False Position = poScreenCenter PixelsPerInch = 96 TextHeight = 13 object ImageBitmap: TImage Left = 17 Top = 14 Width = 32 Height = 32 Anchors = [akTop] AutoSize = True Picture.Data = {} Transparent = True end object LabelMensaje: TLabel Left = 66 Top = 10 Width = 317 Height = 59 Anchors = [akTop] AutoSize = False Caption = 'Mensaje ....' Color = 15202303 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentColor = False ParentFont = False Transparent = True WordWrap = True end object BtnAceptar: TPlaButton Left = 231 Top = 73 Width = 73 Height = 21 Anchors = [akRight, akBottom] Caption = '&Aceptar' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = BtnAceptarClick ModalResult = 1 end object BtnCancelar: TPlaButton Left = 315 Top = 73 Width = 73 Height = 21 Anchors = [akRight, akBottom] Caption = '&Cancelar' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 1 OnClick = BtnCancelarClick ModalResult = 2 end end